home *** CD-ROM | disk | FTP | other *** search
/ Resource Library: Multimedia / Resource Library: Multimedia.iso / hypercrd / xcmds / dvlprstc.hqx / Developer Stack 1.3r / card_19711.txt < prev    next >
Encoding:
Text File  |  1991-04-30  |  1.5 KB  |  60 lines
  1. -- card: 19711 from stack: in.3r
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2202
  5. -- name: PowerCreate
  6. ----- HyperTalk script -----
  7. on newButton
  8.   set autohilite of target to true
  9.   domenu button info...
  10.   edit script of target
  11.   pass newbutton
  12. end newButton
  13.  
  14. on newField
  15.   domenu field info...
  16.   edit script of target
  17.   pass newField
  18. end newField
  19.  
  20.  
  21. -- part contents for background part 10
  22. ----- text -----
  23. 9
  24.  
  25. -- part contents for background part 3
  26. ----- text -----
  27. PowerCreate
  28.  
  29. -- part contents for background part 2
  30. ----- text -----
  31. --NOTE: Handlers are included in the Function section for convenience.
  32.  
  33. --These handlers make it easier to create buttons and fields.  Normally if you want a
  34. --button with an icon you have to select the icon from the button information dialog box
  35. --then double-click (or select 'button info' from the menu) to edit the script.
  36. --These handlers automate the function for every new button or field.  When a new button
  37. --(or field) is created, the information dialog box will appear, allowing you to select the 
  38. --type and icon (or text for a field).  Then the edit script box will automatically appear.
  39. --Saves some time & makes development easier.
  40. --
  41. --It is installed in this card.  Try it!
  42. --
  43. --by Steve Drazga, AnalytX.
  44. --
  45. on newButton
  46.    set autohilite of target to true
  47.    domenu button info...
  48.    edit script of target
  49.    pass newbutton
  50. end newButton
  51.  
  52. on newField
  53.    domenu field info...
  54.    edit script of target
  55.    pass newField
  56. end newField
  57.  
  58. -- part contents for background part 19
  59. ----- text -----
  60. Functions